home *** CD-ROM | disk | FTP | other *** search
- *** 03/19/86 df (C) 1986 Mirage Concepts ***
- *** FILE NAME -- EXEC.CMD
- *** This command file will allow the user to run other programs and
- *** then returns the user back to H & D Base.
- *** You must have sufficient memory to load the external program.
- ***
- *** To load these commands in you just need to type:
- *** DO EXEC
- ***
-
- SET FORTH ON
-
- *** We need to allocate enough memory for the additional commands
- : MALLOC 72 L>W 2 -1 GDOS ;
- 2000 MALLOC DROP
-
- *** First we must create some data space to store the ENVIRONMENT string,
- *** COMMAND string, and FILE string
-
- .CREATE ENV 10 ALLOT ENV 10 0 FILL
- .CREATE COM 20 ALLOT COM 20 0 FILL
- .CREATE FIL 20 ALLOT FIL 20 0 FILL
-
- : EXEC ( ENV, COM, FIL -- flag )
- 0 L>W 75 L>W 8 -1 GDOS ;
-
- : RUN FIL 20 0 FILL 32 WORD .COUNT FIL SWAP CMOVE ENV COM FIL EXEC DROP
- CRS-ON ;
-
- *** The RUN command is used in the following form :
- *** RUN <program name>
- *** To run our File/Sector editor from our Toolbox Volume I you would
- *** type the following:
- *** RUN FSEDITOR.PRG
- *** NOTE: The file type, .PRG in the above case must be included.
- *** You may find that the program that you RUN changes screen colors.
- *** You should always reset these to your preferences upon returning
- *** to H & D Base. A sample command file might read.
- *** RUN FSEDITOR.PRG
- *** SET COLOR TO 0
- *** SET BACKGROUND TO 3
- ***
-
-
-
- əəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəə